From: Andrea Corallo <acorallo@gnu.org>
Date: Tue, 19 Mar 2024 09:48:18 +0000 (+0100)
Subject: * test/lisp/emacs-lisp/comp-cstr-tests.el (comp-cstr-test-93): Add test.
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~14^2~18^2~2201
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=f7f619779c93bb567a1658ef06199fc1816f88fb;p=emacs.git

* test/lisp/emacs-lisp/comp-cstr-tests.el (comp-cstr-test-93): Add test.
---

diff --git a/test/lisp/emacs-lisp/comp-cstr-tests.el b/test/lisp/emacs-lisp/comp-cstr-tests.el
index 991ab1f40eb..b823a190d5a 100644
--- a/test/lisp/emacs-lisp/comp-cstr-tests.el
+++ b/test/lisp/emacs-lisp/comp-cstr-tests.el
@@ -232,9 +232,8 @@ The arg is an alist of: type specifier -> expected type specifier."
   ;; 92
   ((or string char-table bool-vector vector cons symbol number) .
    (or number sequence symbol))
-  ;; 93?
-  ;; FIXME: I get `cons' rather than `list'?
-  ;;((or null cons) . list)
+  ;; 93
+  ((or list (not null)) . t)
   ))
 
 ;;; comp-cstr-tests.el ends here